25 BLOAD"B.DEMO",8 BLOCK 31
26 :
30 REM LADEN DER TONDATEN
35 BLOAD"S.DEMO",8
36 :
40 REM ABSPIELEN DER BLOCKTABELLE
45 PLAY BLOCK 1 SPEED 10
50 REM BLOCK 2 MIT UNTERSCHIEDLICHEN
51 REM SPEEDWERTEN ABSPIELEN
52 :
55 FOR I=1TO5
56 QQ=INT (RND(TI)*8)+6
57 PLAY BLOCK 2 SPEED QQ
58 NEXT I
59 :
60 PLAY BLOCK 3 SPEED 10